home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Utilities / Programming / EnterAct 3.5 / Drag_on Modules / hAWK programs / reverse < prev    next >
Encoding:
Text File  |  1991-11-23  |  150 b   |  11 lines  |  [TEXT/KEEN]
  1. #reverse: reverse the lines in stdout
  2.  
  3. {out[++n] = $0}
  4.  
  5. END {
  6.     for (i = n; i >= 1; --i)
  7.         {
  8.         print out[i]
  9.         delete out[i] #free up some memory
  10.         }
  11.     }